extern int dposl_(doublereal *a, integer *lda, integer *n, doublereal *b);
/*:ref: ddot_ 7 5 4 7 4 7 4 */
/*:ref: daxpy_ 14 6 4 7 7 4 7 4 */
